Set ws = CreateObject("Wscript.Shell")

Function IsExitAFile(filespec)
        Dim fso
        Set fso=CreateObject("Scripting.FileSystemObject")        
        If fso.fileExists(filespec) Then         
        IsExitAFile=True        
        Else IsExitAFile=False        
        End If
End Function

currentpath = createobject("Scripting.FileSystemObject").GetFolder(".").Path
REM WScript.Echo(currentpath)

If IsExitAFile(currentpath + "\\data.db") Then
ws.run "cmd /c activate pytorch && dir && flask run"
Else ws.run "cmd /c activate pytorch && dir && flask go && flask run"
End If